home *** CD-ROM | disk | FTP | other *** search
/ CD Exchange / CD Exchange - Volume 1.iso / utils / misc / fed-case / flows / chaos.flow < prev    next >
Encoding:
Text File  |  1993-12-05  |  941 b   |  30 lines
  1. C.Joosen & R.Heijmans
  2. Heijmans & Joosen
  3. FED-CASE
  4. Mon Oct 18 02:19:28 1993
  5. R1.0
  6.   858993202  859008879  1869573999  1869573938
  7.                                                                                
  8.   859059250  842215986  842150193  909324850
  9. ’V_chaos(FF_X,FF_k)€
  10.   859059506  825439282  842150449  942879282
  11. šLF_eps=0.00001; LI_count=0€
  12.   859059762  825441330  842150449  858993202
  13. €
  14.   859125553  825439282  842151473  942879282
  15. šLF_Xnew=FF_k*FF_X*(1-FF_X)€
  16.   859125810  825439282  842150449  976433714
  17. ¦LF_Xold=FF_X; FF_X=LF_Xnew; LI_count++€
  18.   859060531  825441586  842151985  959656498
  19. ›abs(LF_Xnew-LF_Xold)>LF_eps€
  20.   859060786  825441842  842150449  959656498
  21. ¡printf("%d iteraties\n",LI_count)€
  22.   859061042  825373490  842150449  875770418
  23. ‰V_chaos()€
  24.   859649074  842215986  842150193  875770418
  25. ˆV_main()€
  26.   859649586  825373490  842150449  875770418
  27. ˆV_main()€
  28.   859649330  825441074  842150449  892547634
  29. V_chaos(22,115)€
  30.